home *** CD-ROM | disk | FTP | other *** search
/ The Best of Select: Games Special 4 / THE BEST OF SELECT Games Special 4 (Select CD-ROM)(1996).iso / dosgames / abuse / abuse.lsp < prev    next >
Lisp/Scheme  |  1995-09-13  |  1KB  |  44 lines
  1. ;; Copyright 1995 Crack dot Com,  All Rights reserved
  2. ;; See licensing information for more details on usage rights
  3.  
  4. ;(trace)
  5. (perm-space)
  6. (setq load_warn nil)
  7. (if (not (load "lisp/common.lsp"))
  8.     (progn
  9.       (print "Please make sure you unzipped the game with the -d option")
  10.       (print "so that all directories get created properly.")      
  11.       (print "example : pkunzip -d abusXXXX.zip")      
  12.       (quit)))
  13. (setq load_warn T)
  14.  
  15.  
  16. (load "lisp/options.lsp")     
  17. (load "lisp/startup.lsp")
  18. (load "lisp/input.lsp")
  19. (load "lisp/userfuns.lsp")
  20. (load "lisp/sfx.lsp")
  21. (load "lisp/gates.lsp")
  22. (load "lisp/duong.lsp")
  23. (load "lisp/ant.lsp")
  24. (load "lisp/people.lsp")
  25. (load "lisp/weapons.lsp")
  26. (load "lisp/explo.lsp")
  27. (load "lisp/platform.lsp")
  28. (load "lisp/guns.lsp")
  29. (load "lisp/jugger.lsp")
  30. (load "lisp/flyer.lsp")
  31. (load "lisp/teleport.lsp")
  32. (load "lisp/general.lsp")
  33. (load "lisp/powerup.lsp")
  34. (load "lisp/doors.lsp")
  35. (load "lisp/light.lsp")
  36. (load "lisp/ladder.lsp")
  37. (load "lisp/switch.lsp")
  38.  
  39. (setq bad_guy_list (list DARNEL ANT_ROOF TRACK_GUN SPRAY_GUN JUGGER ROB1 WHO ROCKET FLYER GREEN_FLYER BOSS_ANT))
  40.  
  41. (gc)              ;; garbage collection perm space
  42. (tmp-space)       ;; execute game code in tmp space which is not GC'ed
  43. (create_players DARNEL)
  44.